home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / c / jpl_c.zip / STRNCPY.C < prev    next >
Text File  |  1986-05-18  |  768b  |  27 lines

  1. /* 1.0  07-06-84 */
  2. /************************************************************************
  3.  *            Robert C. Tausworthe                *
  4.  *            Jet Propulsion Laboratory            *
  5.  *            Pasadena, CA 91009        1984        *
  6.  ************************************************************************/
  7.  
  8. #include "defs.h"
  9. #include "stdtyp.h"
  10.  
  11. /************************************************************************/
  12.     STRING
  13. strncpy(s1, s2, n)    /* copy leftmost n chars of s2 into s1,
  14.                return s1                    */
  15. /*----------------------------------------------------------------------*/
  16. STRING s1, s2;
  17. int n;
  18. {
  19.     STRING s;
  20.  
  21.     for (s = s1; n-- > 0 AND (*s1 = *s2); s1++ , s2++)
  22.         ;
  23.     *s1 = NULL;
  24.     return s;
  25. }
  26.  
  27.